*use "BCG_JOP_ReplicationData.dta" 

xtset audience year, yearly



*** MAIN PAPER TABLE 2***
		
*Program (Column 1)
logit audience_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)

*Pursue (Column 2)
logit pursue_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | audience_explore ==1 | (audience_on==1 & pursue_start==1)) & year_a>1945, vce(cluster audience)

*Explore (Column 3)
logit explore_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & explore_start==1)) & year_a>1945, vce(cluster audience)

* Accelerate (Column 4)
logit audience_accel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & year_a>1945 & (audience_pursue ==0 | pursue_start==1), vce(cluster audience)

*Decelerate (Column 5)
logit audience_decel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" &audience_on==1 & year_a>1945, vce(cluster audience)

* End (Column 6)
logit audience_end  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" & audience_on==1 & year_a>1945, vce(cluster audience)

*Status Change (Column 7)
reg status_change  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & year_a>1945, vce(cluster audience)


*** MAIN PAPER TABLE 3 ***

*Program (Column 1)
logit audience_start tol_end_total_full_5 Nat_total_full_5 dll_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)

*Pursue (Column 2)
logit pursue_start tol_end_total_full_5 Nat_total_full_5 dll_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a  if aec2==1 & (audience_on==0 | audience_explore ==1 | (audience_on==1 & pursue_start==1)) & year_a>1945, vce(cluster audience)

*Explore (Column 3)
logit explore_start tol_end_total_full_5 Nat_total_full_5 dll_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a if aec2==1 & (audience_on==0 | (audience_on==1 & explore_start==1)) & year_a>1945, vce(cluster audience)

* Accelerate (Column 4)
logit audience_accel tol_end_total_full_5 Nat_total_full_5 dll_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a if aec2==1 & year_a>1945 & (audience_pursue ==0 | pursue_start==1), vce(cluster audience)

*Decelerate (Column 5)
logit audience_decel tol_end_total_full_5 Nat_total_full_5 dll_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" &audience_on==1 & year_a>1945, vce(cluster audience)

* End (Column 6)
logit audience_end tol_end_total_full_5 Nat_total_full_5 dll_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" & audience_on==1 & year_a>1945, vce(cluster audience)

*Status Change (Column 7)
reg status_change tol_end_total_full_5 Nat_total_full_5 dll_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a if aec2==1 & year_a>1945, vce(cluster audience)





*** APPENDIX TABLE 7 ***

*Unweighted (Column 1)
logit audience_start tol_end_total_full_5 Nat_total_full_5 dll_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)


*Time Weighted (Column 2)
logit audience_start tol_end_tw_total_full_5 Nat_tw_total_full_5 dll_tw_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)

*nu-clear Weighted (Column 3)
logit audience_start tol_end_infw_total_full_5 Nat_infw_total_full_5 dll_infw_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)

*Ideal Point Weighted (Column 4)
logit audience_start tol_end_ipdw_total_full_5 Nat_ipdw_total_full_5 dll_ipdw_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)

*Polity Weighted (Column 5)
logit audience_start tol_end_pw_total_full_5 Nat_pw_total_full_5 dll_pw_total_full_5 inttot_a civtot_a rival_weapon gdp_pc polity2_a  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)



*** APPENDIX TABLE 8 ***

*Program (Column 1)
logit audience_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)

*Pursue (Column 2)
logit pursue_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5   if (audience_on==0 | audience_explore ==1 | (audience_on==1 & pursue_start==1)) & year_a>1945, vce(cluster audience)

*Explore (Column 3)
logit explore_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if (audience_on==0 | (audience_on==1 & explore_start==1)) & year_a>1945, vce(cluster audience)

* Accelerate (Column 4)
logit audience_accel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if year_a>1945 & (audience_pursue ==0 | pursue_start==1), vce(cluster audience)

*Decelerate (Column 5)
logit audience_decel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if  resp_a!="attack" & resp_a!="tolerate1" &audience_on==1 & year_a>1945, vce(cluster audience)

* End (Column 6)
logit audience_end  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if   resp_a!="attack" & resp_a!="tolerate1" & audience_on==1 & year_a>1945, vce(cluster audience)

*Status Change (Column 7)
reg status_change  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if  year_a>1945, vce(cluster audience)


*** APPENDIX TABLE 9***

		
*Program (Column 1)
logit audience_start  dummy_tol_end_total_full_5 dummy_at_total_full_5 dummy_dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)

*Pursue (Column 2)
logit pursue_start  dummy_tol_end_total_full_5 dummy_at_total_full_5 dummy_dll_total_full_5  if aec2==1 & (audience_on==0 | audience_explore ==1 | (audience_on==1 & pursue_start==1)) & year_a>1945, vce(cluster audience)

*Explore (Column 3)
logit explore_start  dummy_tol_end_total_full_5 dummy_at_total_full_5 dummy_dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & explore_start==1)) & year_a>1945, vce(cluster audience)

* Accelerate (Column 4)
logit audience_accel  dummy_tol_end_total_full_5 dummy_at_total_full_5 dummy_dll_total_full_5  if aec2==1 & year_a>1945 & (audience_pursue ==0 | pursue_start==1), vce(cluster audience)

*Decelerate (Column 5)
logit audience_decel  dummy_tol_end_total_full_5 dummy_at_total_full_5 dummy_dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" &audience_on==1 & year_a>1945, vce(cluster audience)

* End (Column 6)
logit audience_end  dummy_tol_end_total_full_5 dummy_at_total_full_5 dummy_dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" & audience_on==1 & year_a>1945, vce(cluster audience)

*Status Change (Column 7)
reg status_change  dummy_tol_end_total_full_5 dummy_at_total_full_5 dummy_dll_total_full_5  if aec2==1 & year_a>1945, vce(cluster audience)




*** APPENDIX TABLE 10***
		
*Program (Column 1)
logit audience_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>=1939, vce(cluster audience)

*Pursue (Column 2)
logit pursue_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | audience_explore ==1 | (audience_on==1 & pursue_start==1)) & year_a>=1939, vce(cluster audience)

*Explore (Column 3)
logit explore_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & explore_start==1)) & year_a>=1939, vce(cluster audience)

* Accelerate (Column 4)
logit audience_accel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & year_a>=1939 & (audience_pursue ==0 | pursue_start==1), vce(cluster audience)

*Decelerate (Column 5)
logit audience_decel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" &audience_on==1 & year_a>=1939, vce(cluster audience)

* End (Column 6)
logit audience_end  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" & audience_on==1 & year_a>=1939, vce(cluster audience)

*Status Change (Column 7)
reg status_change  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & year_a>=1939, vce(cluster audience)


*** APPENDIX TABLE 11***
		
*Program (Column 1)
logit audience_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>=1969, vce(cluster audience)

*Pursue (Column 2)
logit pursue_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | audience_explore ==1 | (audience_on==1 & pursue_start==1)) & year_a>=1969, vce(cluster audience)

*Explore (Column 3)
logit explore_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & explore_start==1)) & year_a>=1969, vce(cluster audience)

* Accelerate (Column 4)
logit audience_accel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & year_a>=1969 & (audience_pursue ==0 | pursue_start==1), vce(cluster audience)

*Decelerate (Column 5)
logit audience_decel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" &audience_on==1 & year_a>=1969, vce(cluster audience)

* End (Column 6)
logit audience_end  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" & audience_on==1 & year_a>=1969, vce(cluster audience)

*Status Change (Column 7)
reg status_change  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & year_a>=1969, vce(cluster audience)


*** APPENDIX TABLE 12***
		
*Program (Column 1)
logit audience_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>=1976, vce(cluster audience)

*Pursue (Column 2)
logit pursue_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | audience_explore ==1 | (audience_on==1 & pursue_start==1)) & year_a>=1976, vce(cluster audience)

*Explore (Column 3)
logit explore_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & (audience_on==0 | (audience_on==1 & explore_start==1)) & year_a>=1976, vce(cluster audience)

* Accelerate (Column 4)
logit audience_accel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & year_a>=1976 & (audience_pursue ==0 | pursue_start==1), vce(cluster audience)

*Decelerate (Column 5)
logit audience_decel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" &audience_on==1 & year_a>=1976, vce(cluster audience)

* End (Column 6)
logit audience_end  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" & audience_on==1 & year_a>=1976, vce(cluster audience)

*Status Change (Column 7)
reg status_change  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  if aec2==1 & year_a>=1976, vce(cluster audience)



***APPENDIX TABLE 13*** 

*Program (Column 1)
logit audience_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  MID5 totrival cowmaj if aec2==1 & (audience_on==0 | (audience_on==1 & audience_start==1)) & year_a>1945, vce(cluster audience)

*Pursue (Column 2)
logit pursue_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5   MID5 totrival cowmaj if aec2==1 & (audience_on==0 | audience_explore ==1 | (audience_on==1 & pursue_start==1)) & year_a>1945, vce(cluster audience)

*Explore (Column 3)
logit explore_start  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  MID5 totrival cowmaj if aec2==1 & (audience_on==0 | (audience_on==1 & explore_start==1)) & year_a>1945, vce(cluster audience)

* Accelerate (Column 4)
logit audience_accel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  MID5 totrival cowmaj if aec2==1 & year_a>1945 & (audience_pursue ==0 | pursue_start==1), vce(cluster audience)

*Decelerate (Column 5)
logit audience_decel  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  MID5 totrival cowmaj if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" &audience_on==1 & year_a>1945, vce(cluster audience)

* End (Column 6)
logit audience_end  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  MID5 totrival cowmaj if aec2==1 & resp_a!="attack" & resp_a!="tolerate1" & audience_on==1 & year_a>1945, vce(cluster audience)

*Status Change (Column 7)
reg status_change  tol_end_total_full_5 Nat_total_full_5 dll_total_full_5  MID5 totrival cowmaj if aec2==1 & year_a>1945, vce(cluster audience)
